in-class exercise 6

pacman::p_load(ggHoriPlot, ggthemes, tidyverse)

averp <- read_csv("data/AVERP.csv") %>%
  mutate(`Date` = dmy(`Date`))